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000074' 


000000 


220 


000076' 


000000 


221 


000100* 


000000 


222 


000102* 




223 


£00102* 


000000 


224 


000104' 




225 


000104' 


000000 


226 


000106' 




227 


000106* 


000000 


228 


000110' 


000000 


229 


000112' 


000254' 


230 


000114* 


000000 


231 


000116' 


000000 


232 


000120' 


000000 


233 


000122* 


000000 


234 




000040 


235 







IOMOD 
MODULE 
.TITLE 
J DDXCOM 
.LIST 

BEGIN | 

MODNAMI .ASCII 

XFLAGi .BYTE 

ADDR! 171020+ 

VECTOPi 440+0 

BR1! .BYTE 

PR2I .BYTE 

DVIDU + 1 



SRll 
SR2I 
SR3! 
SR4| 



OFEN 
OPEN 
OPEN 
OPEN 



;«**#«###««*#«* 



140000 
START 



60, 



STATi 

INITl 

SPOINTl MODSP 

PASCNTI 

ICONTj 

ICOUNTI 

SOrCNTl 

HRDCNTI 

SOFPASI 

HRDPASI 

SYSCNTl 

RANNI.IM! 

CONFIG! 

RESlt 

RES2I 

SVP0I 

SVRll 

SVR2I 

SVR3I 

SVM: 

SVP5I 

SVP6I 

CSRAi 

SRiHR! 

ACSRi 

WftSADRI 

RSTATj 

ERR T YPI 

A5B| 

AWASI 

RSTRTl 

WDTOS 

WDFRj 

INlkJ 

IDNUMj 



OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 
OPEN 

OPEN 

OPEN 

OPEN 

OPEN 

PESTPT 

OPEN 

OPEN 

OPEN 



.PEPT 

.NLIST 



< M NCA >, 171020,440,4,0,0,60, ,0 
140000, MNCA ,171020,440,4,0,0,60, ,0 
MKCA DEC/X11 SYSTEM EXERCISER MODULE 
VERSION 6 23»MAY»78 
BIN 

/N'NCA / JMODULE N^me, 

OPEN jUSED TO KEEP TRACK OF WBUFF U5AGE 

' MST DEVICE ADDR, 

»1ST DEVICE VECTOR, 
PPTY4 + J 1ST BR LEVEL. 

PPTY0+0 >2N0 BR LEVEL, 

JDEVICE INDICATOR 1, 

ISWITCH REGISTER 1 

ISWITCH REGISTER 2 

JSWITCH REGISTFR 3 

JSWITCH REGISTER 4 

JSTATUS WORD, 
JMODULE START ADDR, 
IMOOULE STACK POINTER, 
JPASS COUNTER, 

ft OF ITERATIONS PER PASSs60, 
JLOC TO COUNT ITERATIONS 
jLOC TO SAVE TOTAL SOFT ERROPS 
JLOC TO SAVE TOTAL HARD ERRORS 
jLOC TO SAVE SOFT ERRORS PER PASS 
JLOC TO SAVE HARD ERRORS PER PASS 
J# OF SYS ERRORS ACCUMULATED 
JhOLDS RANDOM * WHEN RAND MACRO IS CALLED 
jPESEHVED FOP MONITOR USE 
PRESERVED FOR MONITOR USE 
IRESERVED FOR MONITOR USE 
JLOC TO SAVE R0, 
jLOC TO SAVE Ri, 
;LOC TO SAVE R2, 
jLOC TO SAVE R3, 
JLOC TO SAVE P4, 
JLOC TO SAVE R5. 
JLOC TO SAVE R6, 
lADOR OF CURRENT CSR, 
JADDR OF GOOD DATA, OR 
jCONTENTS OF CSR. 
JADDR OF BAD DATA, OR 
JSTATUS REG CONTENTS, 
JTYPF OF ERROP 
JEXPECTED DATA, 
JACTUAL DATA, 

IPESTAPT ADDRESS AFTER END OF PASS 
JWORDS TO MEMORY PER ITERATION 
jWOPDS FROM MFMORY PEP ITERATION 
J» OF INTERRUPTS PER ITERATION 
JMODULE IDENTIFICATION NUMBERS 
SPSIZ JMODULE STACK STARTS HERE, 
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236 












.WOPD 





237 












.LIST 




238 












,ENDP 




239 


000224' 








MODSP! 






240 










;######*<»#$«##««*.»######*##« 


241 


000224* 


000001 






TEMPI 


1 




242 
















243 












j MODULE 


REQUIRED REG 


244 
















245 


000226' 


171020 






ASP! 


.WORD 


171020 


246 


000230' 


171022 






ABP! 


.WORD 


171022 


247 
















248 


000232* 


000440 






AVECTJ 


.WORD 


440 


249 


000234' 


000442 






AVECT2! 


.WORD 


442 


250 
















251 


000236' 


000444 






BVFCTl 


.WOPP 


444 


252 


000240' 


000446 






BVECT2I 


.WORD 


44b 


25 3 
















254 


000242' 


000001 






RATEP! 


.WORD 


1 


255 


000244* 


000000 






OFF! 


.WORD 





256 


000246' 


000000 






RANAi 


.WORD 





257 


000250' 


000000 






RANBl 


.WOPD 





258 


000252* 


000000 






AIFLG| 


.WORD 





259 
















260 


000254* 








PESTPT! 






261 


000254* 


004767 


000002 




START! 


JSR 


PC, START0 


262 


000260* 


000442 








BR 


LfiGl 


263 
















264 


000262* 


012767 


000001 


177734 


START0I 


MOV 


*BJT0,TEKP 


265 


000270' 


016767 


177512 


177730 


STARTH 


MOV 


ADDRi ASP 


266 


000276* 


016767 


177506 


177726 




MOV 


VECTOR, AVECT 


267 


000304* 


016767 


177716 


177716 


START2I 


MOV 


ASRiABR 


268 


000312* 


062767 


000002 


177710 




ADD 


»2,ABR 


269 


000320* 


016700 


177706 






MOV 


AVECT,R0 


270 


000324* 


062700 


000004 






ADD 


#4,R0 


271 


000330* 


010067 


177702 






MOV 


R0,BVECT 


272 


000334' 


016767 


177672 


177672 




MOV 


AVECT,AVECT2 


273 


000342' 


062767 


000002 


177664 




ADD 


*2#AVECT2 


274 


000350' 


016767 


177662 


177662 




MOV 


BVECT,BVECT2 


275 


000356* 


062767 


000002 


177654 




ADD 


*2,BVECT? 


276 


000364* 


000207 








RTS 


PC 



JMASK OF CURRENT UNIT 



JCLOCK A STATUS REG, 
JCLOCK A BUFFER REG, 



JCLOCK A INTERRUPT VECTOR, 



JCLOCK INTERRUPT VECTOR, 



#«########««##« 



JPOINTS TO CURRENT RATE 

JOFFSET TO TAKE US TO RATE ROUTINE 

jRANDOM NUMBER, 

JPANDOM NUMBER, 

jFLAG TO SHOW THAT CLOCK A HAS INTERRUPTED, 



JPRIME THE ADDRESSES 
JRUN LOGIC TEST 

jLOAD CURRENT UNIT MASK 

JGET BASE ADDR, 

jGET BASE VECTOR ADDR, 

JNOW WE'RE GONNA FIX 

jALL CLOCK ADDRESSES BASED ON ASP, 

JNOW FIX VECTOR ADDRESSES 



JEXIT 



:i|llllk 
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277 










278 










279 










280 










281 










282 










283 


000366' 


005777 


177634 




284 










289 










286 










287 










288 










289 










29e 










291 










292 










293 


000372* 


fc»12767 


044125 


177504 


294 


000400' 


016777 


177500 


J77620 


295 


000406* 


017767 


177614 


177466 


296 


0P0414' 


026767 


177464 


177460 


297 










298 


000422* 


001412 






299 


000424' 


104407 


000000* 




300 


000430* 


104407 


000000' 




301 


000434* 


016767 


177566 


177436 


302 










303 


000442' 


104405 


000000* 


000000 


304 










305 


P0P450' 


005077 


177552 




306 


000454* 


017767 


177546 


177420 


307 


000462* 


001414 






308 


000464' 


104407 


000000* 




309 


000470' 


104407 


000000' 




310 


000474' 


005067 


177404 




311 


000500' 


016767 


177522 


177372 


312 










313 


000506' 


J04405 


000000' 


000000 



I* 

(#LOUIC TEST HI BE SURE A CLOCK EXISTS AT THE 
(#SPECIFIFD APDR, IF UO CLOCK, THEN A 
;»DEC/X11 SYS ERROR WILL OCCUR, 
»* 



LOGlt TST 



8ASR 



(ADDRESS THE CLOCK, IF SYS ERROR 
(OCCURS, THEN CLOCK DID NOT 
{RETURN SLAVE-SYN WHEN 
(ADDRESSED. 



) 



MOV 


8P44125, ASTAT 


MOV 


ASTAT»9ASR 


MOV 


»ASP,ACSP 


CMP 


ASTAT* ACSR 



»#LOGIC TEST «2, MAKE SURE CLOCK CSR BITS 
(*14, 11,6,5,2 AND CAN BE SET t CLEARED. 



LOG2I MOV 8P44125, ASTAT (GENERATE ♦ RECORD PATTERN TO BE USED, 

(SET THEM IN CSR OF CLOCK A. 
|PEAD THEM BACK 
(DIP THEY ALL SET? 

BEQ 23 {YES « GO TO NEXT TEST, 

BREAKS, BEGIN (TEMPORARY RETUPN TO MONITOR,,., 

BREAK!, BEGIN (THEN CONTINUE AT NEXT INSTRUCTION, 

MOV ASR,CSRA {RECORD CSP'S ADDR 

;##««#««##««#»#««##•»#«###«#««##«#«#««##»«##«««#«#«###««»#•»#»««#« 

HRDER8, BEGIN, NULL ((PATTERN 044125 FAILED 

1 it************************************************************** 

CLR P&SP (TRY CLEARING THE BITS 

MOV ?ASR»ACSR (READ IT BACK, 

BFQ LOG3 | IF ZERO CSR GOOD, 

BREAKS, BEGIN {TEMPORARY RETURN TO MONITOR,,,, 

BPEAK$, BEGIN |THEN CONTINUE AT NEXT INSTRUCTION, 

CLR ASTAT (EXPECT ZERO CSR B 

MOV ASR,CSRA (RECORD CSP'S ADDR, 

(###*#««««#«»*#*«# ««###*««###*####« »«###»##*«##**«###»«#«* «#»#«« 

HPDER8,BEGIN,NULL | fCSR FAILED TO CLEAR 



177362 

177476 
177344 
177336 



177314 l$t 



000564' 104405 000000' 000000 
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315 
316 
317 
318 
319 

320 000514' 012767 020052 

321 000522' 016777 177356 

322 000530' 017767 177472 

323 000536' 026767 177342 

324 000544' 001412 

325 000546' 104407 000000* 

326 000552* 104407 00000A* 

327 000556' 016767 177444 
328 
329 
330 

331 000572' 03*077 177430 

332 000576' 017767 177424 177276 

333 000604' 001414 

334 000606* 104407 000000' 

335 000612* 104407 000000' 

336 000616' 005067 177262 

337 000622* 016767 177400 177250 
338 
339 
340 
341 
342 
343 
344 
345 

346 003636* 012767 

347 000644* 016777 

348 000652' 017767 

349 000660* 026767 

350 000666' 001412 

351 000670' 104407 

352 000674* 104407 

353 000700* 016767 
354 
353 
356 

357 000714* 005077 

358 000720* 017767 

359 000726' 001414 

360 000730' 104407 

361 000734* 104407 

362 000740' 005067 

363 000744* 016767 
364 
365 
366 
367 
368 

369 000760' 012767 

370 000766* 016777 
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(♦LOGIC TEST 83, MAKE SURE CLOCK CSR BITS 
1*13,5,3 AND 1 CAN BE SET ♦ CLEARED 



000630' 104405 000000* 000000 



125252 177240 L0G4: 

177234 177356 

177352 177222 

177220 177214 

000000* 
000000' 

177324 177172 181 



000706' 104405 000000' 000000 



177310 2$l 

177304 177154 

000000' 
000000' 

177140 31! 

177260 177126 



000752' 104405 000000' 000000 



MOV 


8*20052, ASTAT 


MOV 


ASTAT, 9ASP 


MOV 


9ASR,ACSP 


CMP 


ASTAT, ACSR 


BEQ 


2$ 



BPEAKS, BEGIN 

BPEAKI.BFGJN 

MOV ASR,CSRA 

r#*«e«#«»#*##*#«« &#####«» 

HRDER$ t BFniN,fJULL 

(#*«##«#*«#*####««»#**#«« 

CLR 9ASP j 

MCV 9A5R,ACSR J 

BEQ L0G4 j 

BREAKS, BEGIN 

BPEAK$,BEGIN 

CLR ASTAT 

MOV ASR,CSRA 

I ##««#»«###«#»«#######*## 

HPDEPS, BEGIN, NULL 

;«#«#########*«»###«##### 

I* 

(#LOGIC TEST #4, M AKE BUR 

(♦PATTERN 125252 CAN BE S 

?* 



{GENERATE ♦ RECORD PATTFPN TO BE USED, 
(SET THEM IN CSR OF CLOCK A. 
{READ THEM BACK 
JDID THEY ALL SET? 
;YES - GO TO NEXT TEST, 
{TEMPORARY RETUPN TO MONITOR,,,, 
(THEN CONTINUE AT NEXT INSTRUCTION, 
{RECORD CSR'S ADDR, 

jCSR PATTERN P20H52 FAILED 

TRY CLEARING THE BITS 

READ IT BACK, 

IF ZERO CSR GOOD, 

TEMPORARY RETUPN TO MONITOR,... 

THEN CONTINUE AT NEXT INSTRUCTION, 

EXPECT ZERO CSR, 

RECORD CSR'S ADDR, 

{CSR FAILED TO CLEAR 

####*#### ###«#«#* *#•&###«#**#*### *** »•»#■» 

E CLOCK BUFFER REG 
ET ♦ CLEAPED, 



MOV 


8125252, ASTAT 


MOV 


ASTATilABR 


MOV 


BABR, ACSP 


CMP 


ASTAT, ACSR 


BEQ 


2H 



052525 177116 L0G5& 
177112 177234 



{GENERATE + RECORD PATTERN TO BE USED, 

{SET THEM IN BUFFER RFC OF CLOCK, 

{READ THEM BACK 

{DID THEY ALL SET? 

{YES - GO TO NEXT TEST, 
BREAKS, BEGIN {TEMPORARY RETURN TO MONITOR,,,, 

BPEAK8, BEGIN {THEN CONTINUE AT NEXT INSTRUCTION, 

MOV ABR,CSRA 

I #«««»*#####«##««**##*###*«»«*#######«»*»#«»#«#« «#* »####*#«##### 
HRDEPS, BEGIN r NULL {(BUFFER REG PATTERN 123252 FAILED 
| ««tf #»« ««#««»«»#««#«###**#««###«*«#« #««*«#««#«««#«#««#«« ######## 
CLR ?ABR |TRY CLEARING THE BITS 

MOV i&BR,ACSP (READ IT BACK. 
BEQ LOGS {IF ZERO BUFFER GOOD, 

BREAK$, BEGIN {TEMPORARY RETURN TO MONITOR,,,, 

BREAK$, BEGIN {THEN CONTINUE AT NEXT INSTRUCTION, 

CLR ASTAT {EXPECT ZERO BUFFER, 

MOV ABR,CSRA (RECORD ADDR, OF BUFFER REG, 
I #**«*««««**«*•*«•***•«•»«•«•*••••*«•»»•••«•»»««•««»««#«•«*«*««# 
HPDERI, BEGIN, NULL ((BUFFER REG FAILED TO CLEAR 
J *»#•••***••**#**»#«««*«*#•*»**«»»•«*•««••»»««»#•*#«•«»##«##««»» 
fftLOGIC TFST #5, MAKE SURE CLOCK BUFFER REG 
(^PATTERN 052525 CAN BE SET ♦ CLEARED 

MOV #052525, ASTAT (GENERATE ♦ RECORD PATTERN TO BE USED, 
MOV ASTAT, #ABP (SET THEM IN BUFFER OF CLOCK A, 



l 



CA DI 


DC/X1 1 SY 


STEM EXE 


;pcisep M 


OPULE 


MACY1 1 


30AC1052) 13-APR-79 a 


NCA0, 


,P11 13-APP-79 


1 08104 










371 


10,3774* 


017767 


177230 


177100 




MOV 


0ABR, ACSR 


372 


001002' 


026767 


177076 


J77P72 




CMp 


A5TAT,ACSR 


373 


001010' 


001412 








PEG 


26 


374 


001012* 


104407 


000009' 






BREAKS, 


»BEGIN 


375 


W01016* 


104407 


00(1000* 






BREAKS, 


iPEGU 1 


376 


001022' 


016767 


177202 


177050 


IS! 


MOV 


APF,CSRA 


377 












j#»#**##**#####*.»##»*a< 


378 


001030' 


104405 


000000' 


0P0CT00 




HPDEPS, 


pBERIN,NULI 


379 












f##**#####.».»#«###.»####i 


380 


001036' 


005077 


177166 




?$! 


CLR 


GABP 


381 


001042* 


017767 


177162 


177032 




MOV 


8ABF,ACSP 


332 


001050' 


001414 








BEQ 


RFST0 


383 


001052' 


104407 


000000* 






BREAKS, 


rBEGIN 


394 


001056' 


104407 


000000' 






BREAKS, 


rBEC-IN 


385 


001062* 


005067 


177016 




33: 


CLR 


ASTAT 


386 


001066' 


016767 


177136 


177004 




MOV 


ABR,CSRA 


387 












>#####*•**»#*#####*•####•! 


388 


001074' 


104405 


000000' 


000000 




HRDEPS, 


.BEGIN, MUl-L 


389 












•########»##•» tf#«#####4H 


390 


001102' 


006367 


177116 




PEST0I 


ASL 


TEMP 


391 


001106' 


022767 


000400 


177110 




CMP 


#PIT8,TEMP 


392 


001114* 


00142<* 








BEQ 


REST1 


393 


001116* 


036767 


177102 


176670 




BIT 


TEMP,PVID1 


394 


001124* 


001414 








BEQ 


PEST1 


395 


00U26' 


005077 


177074 






CLR 


»ASP 


396 


001 132' 


062767 


000004 


177066 




ADD 


M» ASP 


397 


001140' 


062767 


000010 


177064 




ADD 


*10,AVECT 


39» 


00114b' 


004767 


177132 






JSR 


PCSTAPT2 


399 


0B1152' 


000167 


177210 






JMP 


LrGi 


400 


001156' 


012767 


000100 


177056 


RESTil 


MOV 


#PIT6,PATEP 


401 


001164* 


012777 


001574* 


177040 


PEST2I 


MOV 


SlNSEPV,PAVECT 


402 


001172* 


116777 


176614 


177034 


REST3I 


MOVE 


RRl,S»AVECT2 


403 


001200* 


10ftl67 


177036 




LOOPt 


POLB 


PATEP 


404 


001204* 


100005 








BPL 


IS 


405 


001206* 


005067 


177032 






CLP 


OFE 


406 


001212' 


012767 


000001 


177022 




MOV 


»1, PATEP 


407 


001220' 


062767 


000002 


177016 


1SI 


ADD 


*2,OFF 


408 


001226' 


022767 


000016 


177C10 




CMP 


#16, OFF 


409 


0P1234' 


001761 








BEQ 


LOOP 


410 


001236' 


M36767 


177000 


176552 




BIT 


PATEP, SKI 


411 


001244' 


001355 








BNE 


LOOP 


412 


001246' 


005067 


177000 






CLP 


AIFLG 


413 


001252' 


016701 


176766 






MOV 


OFF,Rl 


414 


001256' 


000171 


001262' 






JMP 


3LISTPCP1 ) 
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JpEAD THEM BACK 
IDID THEY ALL SET? 
JYES - GO TO NEXT TEST. 
jTEVPOPAPY KETURN TO MONITOR.,,, 
)THEN CONTINUE AT NEXT INSTRUCTION, 
(RECORD BUFFER PEG ADDB, 

MBUFF REG PATTERN 052525 FAILED 

;TRY CLEARING THE BITS 

JPEAD IT BACK, 

j IF ZERO BUFFER GOOD, 

^TEMPORARY RETURN TO MONITOR,,,, 

JTHEN CONTINUE AT NEXT INSTRUCTION, 

jEXPECT ZERO BUFFER, 

I RECORD BUFFER REG A ADDR, 

MBUFFER PEG FAILED TO CLEAR 

»CHECK FOR NEXT UNIT 

JTEST IF VALID UNIT 

>BR IF NOT 

JTEST IF THIS UNIT IS SELECTED 

fHR IF NOT 

JENSURE CLOCK IS STOPPED 

IHPDATE STATUS ADDRESS 

JUPDATE VECTOR ADDRESS 

JFIX OTHEP VALUES 

(CONTINUE AT LOGl 

1FIRST PASS THRU LOOP, OFFSET*0» RATES WILL*1. 

(SET UP CLOCK A'S INTER, VECTOR, 

(SET PRIORITY ON CLOCK A'S INTR. 

(GET NEXT PATE, 

(IF NOT END THEN CONTINUE, 

(CLEAR THE OFFSET 

(LOOK AT FIRST PATE 

JTEST IF =16 

(BR 

US THIS PATE INHIBITED? 

(CLR FLAG INDICATING CLOCK A HAS INTERRUPTED. 

(PICK UP OFFSET 

(GO SET THE RATE ♦ STAPT THE CLOCK, 



cS\ 
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415 






416 






417 






416 






419 






420 






421 






422 


001262' 


000001 


423 


001264* 


001340 


424 


001266' 


001362 


475 


001270' 


001 40 4 


426 


001272* 


001426 


427 


C01274' 


001450 


428 


001276' 


00147 2 


429 


001 300* 


000001 


430 






431 






432 






433 






434 






435 






436 






437 






438 






439 


001302' 


000001 


440 


001304* 


036260 


441 


001306' 


036260 


442 


001310* 


154360 


443 


001312* 


176030 


444 


001314* 


177634 


445 


001316* 


000000 


446 


001320' 


000001 


447 






448 






449 






450 






451 






452 






453 






454 


001322' 


000000 


455 


00J324' 


000113 


456 


001326' 


000123 


457 


001330' 


000131 


458 


001332* 


000141 


459 


001334' 


000151 


460 


001336* 


000000 



(THE FOLLOWING CLISTP) APE POINTERS TO VARIOUS PATE 
•ROUTINES, THFY ARE USED BY "LOOP", "LOOP" GtNEPATES 
}AN OFFSET OF A PATE WE WISH TO EXERCISE, THE OFFSET 
IIS STOPEP IM pi, WE INDEX "LISTP" BY PI (JMp HLlSTP(Pi)) 
;T0 GET THE ADDRESS OF THE PATE ROUTINE TO EXERCISE, 



( 



.WORD 


1 


.WORD 


RATE0 


,WOPO 


RATE1 


.WORD 


PATE2 


,WOPD 


PATE3 


,KOPD 


PATE4 


,WOPD 


RATE5 


,WOFD 


1 



RSALl 



(POINTER TO 1MHZ ROUTINE 

(POINTER TO 100KHZ ROUTINE 

(POINTER TO 10KHZ ROUTINE 

(POINTER TO 1KHZ ROUTINE 

(POINTER TO 100HZ ROUTINE 

(POINTER TO RANDOM ROUTINE 



(THE FOLLOWING (kATEAL) ARE THE PRESET VALUES THAT THE 
JVAPIOUS PATE ROUTINES NEED, THEY ARE LOADED INTO 
jCLOCK A'S PRESET BUFFER, "PATEAL" IS INDEXED BY 
(AN OFFSET IN PI BY THE PATE ROUTINES TO GET THE 
{PRESET VALUE 



(OFFSET ZERO, NO RA1E, 
(VALUE FOR 1MHZ PRESET, 

IPRESET VALUE FOR 100 KHZ 

(PRESET VALUE FOR 10 KHZ 

(PRESET VALUE FOR 1 KHZ 

(PRESET VALUE FOR 100 HZ 

(PRE5ET VALUE FOP RANDOM 



(THE FOLLOWING (PSAL) IS USED BY THE RANDOM 

IPATE ROUTINE (PATE5), THEY ARE THE VALUES NEEDED 

jTO BE PUT INTO THE CLOCK'S CSR FOR A PARTICULAR PATE, 

1 



(OFFSET ZERO, NO RATE, 
11 MHZ, GO., MODE 1 
(100 KHZ, GO,, MODE 1 
110 KHZ, GO, 
(1 KHZ, GO, 
(100 HZ, GO, 



PATEALl 


.foOPD 


1 




.WORD 


-50000, 




.WORD 


-50000, 




.WORD 


»10000 9 




.WORD 


M000, 




.WORD 


»100, 




.WORD 







.WOPD 


1 



.WORD 





.WORD 


113 


.WORD 


123 


.WORD 


131 


.WORD 


141 


.WORD 


151 


.WOPD 
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461 










462 










463 










464 










463 










466 


001340' 








467 


001349' 


005077 


176662 




468 


001344* 


H16177 


001307' 


176656 


469 


001332' 


016177 


001322' 


176646 


470 










471 


001360' 


104400 






472 










473 










474 










475 










476 










477 










478 










479 


001362* 








480 


001362* 


005077 


176640 




481 


001366' 


016177 


001302' 


176634 


482 


001374' 


016177 


001322' 


176624 


463 










484 


001402* 


104400 






485 










486 










487 










488 










489 










490 










491 










492 


001404* 








493 


001404' 


005077 


176616 




494 


001410' 


H 1 6 1 7 7 


001302* 


176612 


495 


fP!4l6' 


016177 


001322' 


176602 


496 










497 


001424' 


1044O0 






498 










499 










500 










501 










502 










503 










504 










5«5 


001426' 








506 


001426' 


005077 


176574 




507 


001432' 


016177 


001302* 


176570 


508 


001440' 


016177 


001322' 


176560 


509 










510 


001446* 


J04400 







PATE2I 



(*THI5 POWTINr PRESETS CLOCK A FOP 

»*1 MHZ RATE CLOCK A INTRS IN 1/20 SEC., 25 TIMES, 

(* 



CLP PASR ICLEAR CLOCK A, 

MOV PftTEAL(Pl),«ABR (PRESET COUNT IN CLOCK A, 

MOV R6AL(Rl),aASR (START CLOCK A, 

jNOW WAIT FOR INTERRUPT 
EXITS ;EXIT TO MONITOR. MODULE WAIT FOR INTERRRUPT. 



j*THIS pni'TlNE PRESETS CLOCK A FOR 
»#100 KHZ RATE CLOCK A INTRS IN ,5 SEC, 
I* 



TWICE* 



CLR iASR (CLEAR CLOCK A, 

MOV RATEAL(Ri),<?ABR (PRESET COUNT I* CLOCK A. 

MOV RSALCR1),BASR (START CLOCK A. 

|NOW WAIT FOP INTERRUPT, 
EXIT! (EXIT TO MONITOR, MODULE WAIT FOR INTERRUPT, 

I* 

(*THIS ROUTINE PRESETS CLOCK A FOR 

;*10 KHZ HATE CLOCK A INTRS IN 1,0 SEC, 

(» 

;* 

CLR PfSP (CLEAR CLOCK A, 

MOV ' RATEAL{R1),9ABR (PRESET COUNT IN CLOCK A, 

MOV RSAL(Rl)iPASR JSTART CLOCK A, 

(NOW WAIT FOR INTERRUPT, 
EXITS (EXIT TO MONITOR, MODULE WAST FOR INTERRUPT. 



I#THIS POUTINF PRESETS CLOCK FOR 

?*1 KHZ PATE CLOCK A INTRS IN 1,0 SEC, 

(* 



CLR 0ASF (CLEAR CLOCK A, 

MOV RATEAL(Pl),&ABR (PRESET COUNT IN CLOCK A, 

MOV PSAL(P1),9ASR (START CLOCK A, 

(NOW WAIT FOP INTERRUPT, 
EXITS (EXIT TO MONITOR, MODULE WAIT FOR INTERRUPT. 



I 



001450' 
001450' 
001454* 
001462* 



*05077 176552 

016177 0013O2' 176546 

016177 0A1322' 176536 



001470* 104400 



001472* 004767 



MNCA DEC/X11 SYSTEM EXERCISER MODULE 
XMNCA0 S P11 13-APR-79 08(04 



511 
512 
513 
514 
515 
516 
517 
518 
519 
520 
521 
522 
523 
524 
525 
576 
527 
528 
529 
530 
531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
541 
542 
543 
544 
545 
546 
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(*THIS ROUTINE PRESETS CLOCK FOR 

•#100 HZ PATE CLOCK A IPTRS IN 1,0 SEC, 

(* 

(* 



PATE4| 



001476' 
P01504* 



001512' 
001516' 
001520' 
001526' 
001532' 
001534* 
001542' 
001542* 
001546' 
001552* 
001536' 
001564* 



042767 177771 
042767 177771 



17654? 
176536 



005767 17651C 

001003 

062767 000002 176520 

005767 176516 

001003 

062767 000002 176506 



3S( 
481 



005077 
016701 
010167 
016177 
016177 



176460 
176474 
176466 

001302' 176444 
001327* 176434 



CLR flASR (CLEAR CLOCK A, 

MOV RATEAL(R1),0ABR (PRESET COUNT IN CLOCK A, 

MOV P5ALCR1),9ASR (START CLOCK A, 

(NOW WAIT FOR INTERRUPT, 
EXITS (EXIT TO MONITOR, MODULE WAIT FOR INTERRUPT, 

(#THIS ROUTINE PRESETS CLOCK FOR 
(»RANDOM FATES 



PATE5( JSR 



BIC 

BIC 



(GET 2 RANDOM NUMBERS, 



#177771, PANA 
#177771, PANB 



(MAKE NUMBER < 10, 
(VAKE 2ND NUMBER < 10 



(NUMBERS CUST BE 2, 4, OR 6 



TST 

BNE 
ADD 
TST 
BNE 
ADD 

CLR 
MOV 
MOV 
MOV 
MOV 



PANA 

4$ 

#2,FANA 

RANB 

5$ 

*2,RANB 



(IS NUMBER ZERO? 
(NO - GO AHEAD, 
(«AKE IT NON-ZERO, 
(IS NUMBER ZERO? 
(NO GO AHEAD, 
HAKE IT NON-ZERO, 

(CLEAR CLOCK A 



0ASR 

PANA, PI 

R1,0FF (RECORD THE OFFSET 

RATEAL(P1),«ABP (PPFSET CLOCK A. 

P5AL(P1J,9ASR (START CLOCK A, 



001572' 104400 



(EXIT TO MONITOR, MODULE WAIT FOR INTERRUPT 
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PI 1 !3*APR«79 


' 08104 












547 














>*INTEPPUPT 


SERVICE ROUTINE FOR CLOCK, 


548 


0W1574' 


005267 


176452 




INSERVI 


INC 


At FIG 


HNDICATE CLOCK A HAS INTERRUPTED 


549 


001600' 


042777 


000200 


J76420 




BIC 


#200*®ASR 


JCLEAR OVERFLOW FLAG, 


550 


001606' 


026727 


176432 


000002 


23? 


CMP 


OFF,* 2 


*ARE WE RUNNING 1MHZ RATE? 


551 


001614* 


001005 








PNE 


33 


I IF NOT, 3S 


552 


001616' 


026727 


176430 


000024 




CMP 


AIFLG,820. 


11 MHZ, 1 SEC. UP? 


553 


001624' 


001412 








BF.Q 


4S 


IYE5 - STOP 


554 


001626' 


000002 








RT1 




JNO, ALLOW ANOTHER COUNT. 


535 


001630' 


026727 


176410 


000004 


3SI 


CMP 


OFF, 84 


>100 KHZ RATE? 


556 


001636' 


001005 








BNE 


48 


jNO - 4S 


557 


001640* 


026727 


176406 


000002 




CMP 


ATFLG,#2 


>YES, COUNTED TWICE? 


558 


001646' 


001401 








BEQ 


43 


JYES - 4S. 


539 


001650* 


000002 








PTI 




»NO - COUNT ONE MOPE TIME, 


560 
561 


001652' 
001656' 
001664* 


0B5077 
000004 
006367 


176330 

000>00S>' 

176334 


001664' 


43! 
131 


CLP 


8ASF 


JSTOP CLOCK A. 


362 
563 


PIRQ8, 


BEGIN, IS 


I QUEUE UP TO CONTINUE AT IS AND RTI 


564 


ASL 


TEMP 


JCHECK NEXT UNIT 


565 


001670' 


022767 


000400 


176326 




CMP 


»PIT8,TEMP 


JTEST IF VALID UNIT 


566 


001676' 


001004 








BNE 


118 


;BR IF OK 


567 


001700' 








10SI 








568 


091700' 


104413 


000000* 






END IT $ 


, BEGIN 


;SIGNAL END OF ITERATION. 


569 
















JMON1TOP SHALL TEST END OF PASS 


570 


001704' 


000167 


177254 






JMP 


RFST2 




571 


001710* 


036767 


176310 


176076 


1161 


BIT 


TEMp,DVIDl 


JTEST IF UNIT SELECTED TO RUN ? 


572 


001716' 


001770 








BEQ 


1H$ 


jBR IF NOT 


573 


001720* 


^62767 


000004 


176300 




ADD 


«4,ASR 


JUPDATE ADDRESS 


574 


001726* 


062767 


000010 


176276 




ADD 


#10,AVECT 


jUPDATE VECTOP 


575 


001734' 


004767 


176344 






JSR 


PCSTART2 


JFIX ADDRESSES 


576 


001740' 


0001 67 


177226 






JMP 


REST3 




577 












>*THIS 


SUBROUTINE GFNERATE5 TWO RANDOM NUMBERS 


578 












j*CALL 


a JSR PC, RANDOM 


579 












J*RETURNS WITH NUMBERS IN RANDA AND PANDB 


5P0 


001744' 


066767 


176276 


176276 


RANDOM! 


ADD 


PANA,RANB 




581 


001752' 


005567 


17627^ 






ADC 


PANA 




582 


001736' 


066767 


176266 


176262 




ADD 


RANB,RANA 




583 


001764* 


005567 


17626P 






ADC 


PANB 




584 


001770' 


000207 








PTS 


PC 




585 




000001 








,FND 







MNCA DEC/X11 SYSTEM EXERCISER MODULE MACYll 30A(10523 13-APP»79 08|09 PAGE 16 
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246* 267* 268* 347# 348 353 357* 358 363 370* 371 37b 380* 

3*1 386 468* 481* 494* 507* 518# 543* 

223* 295* 296 306* 322* 323 332* 348* 349 358* 371* 372 381* 

189* 263 

241* 

258# 412* 548* 552 557 

227* 

245s 265* 267 283 294* 295 301 305* 306 311 321* 322 327 

J31* 332 337 395* 396* 467* 469* 480* 482* 493* 495* 506* 508* 

517* 519* 540* 544* 549* 560* 573* 

225# 293* 294 296 310* 320* 321 323 336* 346* 347 349 362* 

369* 370 372 385* 

248S 266* 269 272 397* 401* 574* 

249* 272* 273* 402* 

228* 

l p 6* 299 30B 303 30B 3<*9 313 325 326 329 334 335 339 

351 352 355 360 361 365 374 375 378 383 384 388 562 

568 

241# 264 

241* 

241* 

241 

24H 

24U 

241* 

24H 

241 * 

2418 

2418 

2418 

2418 400 

2418 

241# 391 565 

241# 

2*1* 299 300 308 309 325 326 334 33! 

374 375 383 384 

1918 402 

192r 

341 « 

251# 271* 274 

252# 274* 275* 

241* 

21 1# 

221 # 301* 311* 327* 337* 353* 363* 376* 381 

241* 

2418 

193* 393 571 

241# 568 

241# 

226* 

241 # 471 484 497 510 521 546 

241# 

241# 

206# 

2M# 303 313 329 339 355 365 378 381 

209# 



ABR 


000230R 


ACSP 


000102P 


ADDP 


000006R 


ADDP228 


001000 


AIFLG 


000252R 


ASB 


000106P 


ASR 


000226R 


ASTAT 


000104R 


AVECT 


000232P 


AVECT2 


000234R 


AWAS 


000110P 


BEGIN 


000000R 


BIT0 a 


000001 


BIT1 ■ 


000002 


BIT10 s 


002000 


BIT11 ■ 


004009 


BIT12 a 


010000 


BIT13 ■ 


020000 


BIT14 a 


040000 


BIT15 a 


100000 


BIT2 a 


000004 


BIT3 s 


000010 


BIT4 a 


000020 


BITS a 


000040 


BIT6 a 


000100 


BIT7 8 


000200 


BITS b 


000400 


BIT9 a 


001000 


BREAK$b 


104407 


BP1 


000012R 


BR2 


000013R 


BTOD$ ■ 


104421 


BVECT 


000236R 


BVECT2 


000240R 


CDATAga 


104412 


CONFIG 


000056R 


CSRA 


000100R 


DATCKfs 


104411 


DATFRfa 


104404 


DVIDl 


000014R 


END IT ^-a 


104413 


END! a 


104410 


ERPTYP 


000106R 


EXITS a 


104400 


GETPAga 


104415 


GWBUF$s 


164414 


HRDCNT 


000044R 


HRDEPga 


104405 


HRDPAS 


000050R 



351 352 360 361 
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ICONT 


000036R 


203» 
















ICOUMT 


000040R 


204* 
















IDNUM 


000122R 


233* 
















INIT 


000030R 


200* 
















INSEPV 


001574R 


401 


5484 














INTR 


000120R 


232* 
















LISTP 


001262P 


414 


4228 














LOGi 


000366P 


26? 


2839 


399 












LOG2 


000372R 


2933 
















LOG3 


P00514R 


307 


320* 














LOG4 


000636P 


333 


346* 














LOGS 


000760R 


359 


3699 














LOOP 


001200R 


403* 


409 


411 












MAP22SB 


104416 


241 
















MODNAM 


000000R 


187* 
















MODSP 


000224R 


201 


239* 














MSGN8 a 


104403 


241* 
















MSGS8 a 


104402 


241 « 
















MSGS a 


104401 


24U 
















NULL a 


000000 


241* 


303 


313 


329 


339 


355 


365 


378 


off 


O00244P 


255* 


405* 


407* 


408 


413 


542* 


550 


555 


OPEN s 


000000 


188 


194 


195 


196 


197 


214 


215 


216 






223 


225 


227 


228 


230 


231 


232 


241* 


OTOAI a 


104420 


241* 
















PASCNT 


000034R 


202* 
















PIRQ$ a 


000004 


241 # 


562 














POPSP a 


005726 


241 s 
















POPSP2S 


022626 


241 * 
















PRTY a 


000000 


241 « 
















PRTY0 a 


000000 


192 


241* 














PRTY1 a 


000040 


241* 
















PRTY2 a 


000100 


241 # 
















PRTY3 a 


000140 


241 # 
















PRTY4 a 


000200 


191 


241* 














PRTY5 a 


000240 


241* 
















PRTY6 a 


000300 


241* 
















PPTY7 b 


000340 


241 * 
















PS a 


177776 


241# 
















PSW a 


177776 


241* 
















PUSH a 


005746 


24 1 « 
















PUSH2 a 


024646 


241 « 
















RANA 


000246R 


256* 


528* 


533 


535* 


541 


580 


581* 


582* 


RANB 


000250R 


257* 


529* 


536 


538* 


580* 


582 


583* 




RANDOM 


001744R 


526 


580* 














RANDS a 


104417 


241* 
















RANNUM 


000054B 


210ft 
















RATEAL 


001302R 


439* 


468 


481 


494 


507 


518 


543 




RATEP 


000242P 


254* 


400* 


403* 


406* 


410 








RATE0 


001340R 


423 


466* 














RATE1 


001362P 


424 


479# 














RATE2 


001404R 


425 


492* 














RATE3 


001426R 


426 


505* 














RATE4 


001450R 


427 


516* 














RATES 


001472R 


428 


526* 














RESTRT 


0&0254P 


229 


260* 














PEST0 


001102R 


382 


390* 















') 



217 



218 



219 220 221 



f 
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REST1 


001156R 


392 


394 


REST2 


001164P 


4(1* 


570 


REST3 


001172R 


402* 


576 


RES1 


000056R 


212* 




RES2 


000060P 


213* 




RSAL 


001322R 


454* 


469 


RSTRT 


000112P 


229* 




SBADR 


M30102R 


222* 




SOFCNT 


000042P 


205* 




SOFERga 


104406 


241* 




S0FPA5 


000046R 


207* 




SPOINT 


000032R 


201* 




SPSIZ s 


000040 


1» 


234 


SRI 


000016R 


t94* 


410 


SR2 


000020R 


195* 




SP3 


000022P 


196* 




SR4 


000024P 


197* 




START 


00025^R 


200 


261* 


START0 


000262P 


261 


264* 


START1 


000270R 


265* 




STAPT2 


000304P 


267* 


398 


5TAT 


000026R 


199* 




SVR0 


000062P 


214* 




SVR1 


000064R 


215* 




SVR2 


000066R 


216* 




SVR3 


000070P 


217* 




SVR4 


O00072P 


218* 




SVP5 


000074R 


219* 




SVPb 


000076R 


220* 




SYSCNT 


000052P 


209* 




TEMP 


tf0??24R 


24!# 


264* 


TPPDFDs 


000022 


241* 




VECTOR 


000010P 


190* 


266 


WASADR 


000104R 


224* 




WDFR 


000116R 


231* 




WDTO 


000114P 


230* 




XFLAG 


000005R 


188* 





1 



391 



393 



ERRORS DETECTEDl 

DEFAULT GLOBALS GENERATEDl 

PACK IXMNCA0, PACK !XM"CA0/SOL/CBF I SYMapoXCOM, PACK IXMNCA0 
RUN»TIMEI 3 5 .7 SECONDS 
RUN-TIME PATIOl 43/10a4,l 
CORE USEDl 7K C13 PAGES) 



